(ns pe.seq)

(defn indexed-from [from s] (map vector (iterate inc from) s))

(def indexed (partial indexed-from 1))

(defn re-indexed [s] (map vector (iterate dec (count s)) s))
